﻿Public Class frmPrincipal

#Region "Eventos"

    Private Sub ClientesToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ClientesToolStripMenuItem.Click
        Dim usr As New usrCadCliente
        usr.Parent = panelPrincipal
        usr.Show()
    End Sub
    Private Sub VeiculosToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles VeiculosToolStripMenuItem.Click
        Dim usr As New usrVeiculo
        usr.Parent = panelPrincipal
        usr.Show()
    End Sub
    Private Sub EfetuarLocaçãoToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EfetuarLocaçãoToolStripMenuItem.Click
        Dim usr As New usrLocacao
        usr.Parent = panelPrincipal
        usr.Show()
    End Sub

#End Region


End Class